home *** CD-ROM | disk | FTP | other *** search
/ Hottest 6 / Hottest 6 (1996)(PDSoft)[!].iso / software / games / jump / boulderdÄsh / install / boulderdäsh.install next >
Text File  |  1978-11-24  |  10KB  |  346 lines
  1. ; $VER: BoulderDäsh.install 1.00 (11.9.95)
  2. ; Script to install BoulderDäsh
  3. ;
  4. (complete 0)
  5.  
  6. ; Install script for BoulderDäsh (Workbench 2.0 or higher)
  7.  
  8. (set old_level @user-level)
  9.  
  10. (set SourceRoot "/")
  11. ;=============================================================================
  12. ; German strings
  13.  
  14. (if (= @language "deutsch")
  15. (
  16. (set default_lang 2)
  17.  
  18. (set #bad-kick "Sie benötigen Workbench 2.0 oder größer")
  19.  
  20. (set #BoulderDäsh-InstallMsg
  21. (cat "\n\BoulderDäsh Installationsskript.\n"
  22.         "Diese Skript installiert BoulderDäsh auf Ihrem Amiga.\n\n"
  23.         "Lesen Sie das Anleitungs-File für weitere Informationen\n"
  24.         " über den Vertrieb von BoulderDäsh.\n\n"
  25.         "BoulderDäsh © 1995 Guido Mersmann\n"
  26.         "All Rechte reserviert."
  27. ))
  28.  
  29. (set #BoulderDäsh-Where
  30. (cat "Wo möchten Sie BoulderDäsh installieren ?\n"
  31.         "(Ein Verzeichnis wird angelegt)"
  32. ))
  33.  
  34. (set #BoulderDäsh-Update
  35. (cat "\nEin BoulderDäsh-Verzeichnis existiert im ausgewählen"
  36.         " Verzeichnis. Wenn Sie fortfahren,"
  37.         " bestätigen Sie, daß Sie die alte BoulderDäsh-Installation"
  38.         " mit der neuesten Version updaten wollen.\n"
  39.         "Verschiedene BoulderDäsh-Dateien (z.B Prefs) werden überschrieben!"
  40. ))
  41.  
  42. (set #BoulderDäsh-copying-Main "\nKopiere BoulderDäsh nach BoulderDäsh/...")
  43. (set #BoulderDäsh-copying-Catalogs "\nKopiere Kataloge nach ...BoulderDäsh/Locale/...")
  44. (set #BoulderDäsh-copying-Caves "\nKopiere Level nach ...BoulderDäsh/Caves/...")
  45. (set #BoulderDäsh-copying-Games "\nKopiere Spiele nach ...BoulderDäsh/Games/...")
  46. (set #BoulderDäsh-copying-Scores "\nKopiere Scores nach ...BoulderDäsh/Scores/...")
  47. (set #BoulderDäsh-copying-Graphics "\nKopiere Grafiken nach ...BoulderDäsh/Graphics/...")
  48. (set #BoulderDäsh-copying-Fonts "\nKopiere Schriften nach ...BoulderDäsh/Fonts/...")
  49.  
  50. (set #BoulderDäsh-Language "\nWelche Sprachen sollen installiert werden ?")
  51.  
  52. (set #BoulderDäsh-Language-help
  53. (cat "\nDer Amiga kann in vielen verschiedenen Sprachen"
  54.          " arbeiten. Um Plattenkapazität zu sparen können Sie"
  55.          " nur die Sprachen anwählen, die sie benötigen"
  56.          " Haken Sie also einfach die Sprachen ab, die Sie"
  57.          " Ihrem System zugänglich machen wollen."
  58.           @askoptions-help
  59. ))
  60.  
  61. (set #BoulderDäsh-Docs "\nWelche Anleitungs- und Informationsdateien wollen Sie installieren ?")
  62.  
  63. (set #BoulderDäsh-Exit "\nBoulderDäsh installaliert !!")
  64.  
  65.  
  66. ))
  67.  
  68. ;=============================================================================
  69. ; English strings
  70.  
  71. (if (<> @language "deutsch")
  72. (
  73. (set default_lang 4)
  74.  
  75. (set #bad-kick "You must have at least Workbench 2.0+")
  76.  
  77. (set #BoulderDäsh-InstallMsg
  78. (cat "\n\BoulderDäsh installation script.\n"
  79.         "This script installs BoulderDäsh on your Amiga.\n\n"
  80.         "Read the DOK-file for more information\n"
  81.         " on the distribution of BoulderDäsh.\n\n"
  82.         "BoulderDäsh © 1995 Guido Mersmann\n"
  83.         "All rights reserved."
  84. ))
  85.  
  86. (set #BoulderDäsh-Where
  87. (cat "Where would you like to install BoulderDäsh ?\n"
  88.         "(A drawer will be created)"
  89. ))
  90.  
  91. (set #BoulderDäsh-Update
  92. (cat "\nA BoulderDäsh drawer does already exist in the selected "
  93.         " directory. By selecting \"Proceed\", you"
  94.         " indicate that you want to update the BoulderDäsh"
  95.         " installation with the most recent version.\n"
  96.         "Several BoulderDäsh specific files will be overwritten!"
  97. ))
  98.  
  99. (set #BoulderDäsh-copying-Main          "Copying boulderDäsh to ...BoulderDäsh/...")
  100. (set #BoulderDäsh_copying-Catalogs      "Copying catalogs to ...BoulderDäsh/Locale/...")
  101. (set #BoulderDäsh-copying-Caves "\nCopying caves to ...BoulderDäsh/Caves/...")
  102. (set #BoulderDäsh-copying-Games "\nCopying games to ...BoulderDäsh/Games/...")
  103. (set #BoulderDäsh-copying-Scores "\nCopying scores to ...BoulderDäsh/Scores/...")
  104. (set #BoulderDäsh-copying-Graphics "\nCopying graphics to ...BoulderDäsh/Graphics/...")
  105. (set #BoulderDäsh-copying-Fonts "\nCopying fonts to ...BoulderDäsh/Fonts/...")
  106.  
  107. (set #BoulderDäsh-Language "\nWhich languages should be installed ?")
  108. (set #BoulderDäsh-Language-help
  109. (cat "\nThe Amiga can be operated in many different"
  110.           " languages."
  111.           "To reduce the amount of space consumed by the"
  112.           " language files, you can select to have only the"
  113.           " files of specific languages copied.\n\n"
  114.           "Simply check the boxes of the languages you wish"
  115.           " to have available on your system.\n\n"
  116.           @askoptions-help
  117. ))
  118.  
  119. (set #BoulderDäsh-Docs "\nWhich text files should be installed in \"BoulderDäsh:Docs\" ?")
  120.  
  121.  
  122.  
  123. (set #BoulderDäsh-Exit "\nBoulderDäsh installed !!")
  124.  
  125.  
  126. ))
  127. ;=============================================================================
  128.  
  129. (set @default-dest "")
  130.  
  131. ; erst sichergehen, daß Workbench 37 drinn ist
  132. (if (< (/ (getversion) 65536) 37)
  133. (
  134.   (abort #bad-kick)
  135. ))
  136.  
  137.  
  138. (message #install-msg)
  139.  
  140. (welcome)
  141.  
  142.         (set @default-dest "SYS:")
  143.  
  144. (set BoulderDäshdestdir
  145.         (tackon
  146.                 (askdir
  147.                         (prompt #BoulderDäsh-Where)
  148.                         (help @askdir-help)
  149.                         (default @default-dest)
  150.                 )
  151.                 "BoulderDäsh"
  152.         )
  153. )
  154.  
  155. (
  156.         (makedir BoulderDäshdestdir
  157.                 (help @makedir-help)
  158.                 (infos)
  159.         )
  160. )
  161. (set @default-dest BoulderDäshdestdir)
  162.  
  163. ;***** Create dirs
  164. (complete 20)
  165.  
  166. (makedir (tackon BoulderDäshdestdir "Catalogs"))
  167. (makedir (tackon BoulderDäshdestdir "Games"))
  168. (makedir (tackon BoulderDäshdestdir "Fonts"))
  169. (makedir (tackon BoulderDäshdestdir "Scores"))
  170. (makedir (tackon BoulderDäshdestdir "Caves"))
  171. (makedir (tackon BoulderDäshdestdir "Graphics"))
  172. (makedir (tackon BoulderDäshdestdir "Docs"))
  173. (makedir (tackon BoulderDäshdestdir "Docs/Deutsch"))
  174.  
  175. ;***** Delete old Data and Prefs
  176. (delete (tackon BoulderDäshdestdir "BoulderDäsh.prefs"))
  177. (delete (tackon BoulderDäshdestdir "Games/BDash_I.Game"))
  178. (delete (tackon BoulderDäshdestdir "Scores/BDash_I.Game"))
  179. (delete (tackon BoulderDäshdestdir "Graphics/ClassicAmiga.fnt"))
  180.  
  181. ;***** Icons
  182. (complete 25)
  183.  
  184. (copyfiles
  185.         (source (tackon SourceRoot "Graphics.info"))
  186.         (dest BoulderDäshdestdir)
  187. )
  188. (copyfiles
  189.         (source (tackon SourceRoot "Install.info"))
  190.         (dest BoulderDäshdestdir)
  191. )
  192. (copyfiles
  193.         (source (tackon SourceRoot "Docs.info"))
  194.         (dest BoulderDäshdestdir)
  195. )
  196. (copyfiles
  197.         (source (tackon SourceRoot "Fonts.info"))
  198.         (dest BoulderDäshdestdir)
  199. )
  200.  
  201. ;***** BoulderDäsh_Main
  202. (complete 30)
  203.  
  204. (copyfiles
  205.         (prompt "\n" #BoulderDäsh-copying-Main)
  206.         (source (tackon SourceRoot "BoulderDäsh")(infos))
  207.         (dest BoulderDäshdestdir)
  208.         (help @copyfiles-help)
  209.         (optional <force>)
  210.         (infos)
  211. )
  212. ;***** Games
  213. (complete 40)
  214.  
  215. (copyfiles
  216.         (prompt "\n" #BoulderDäsh-copying-Games)
  217.         (source (tackon SourceRoot "Games/"))
  218.         (dest (tackon BoulderDäshdestdir "Games/"))
  219.         (help @copyfiles-help)
  220.         (optional <force>)
  221.         (all)
  222. ;        (infos)
  223. )
  224. ;***** Scores
  225. (complete 50)
  226.  
  227. (copyfiles
  228.         (prompt "\n" #BoulderDäsh-copying-Scores)
  229.         (source (tackon SourceRoot "Scores/"))
  230.         (dest (tackon BoulderDäshdestdir "Scores/"))
  231.         (help @copyfiles-help)
  232.         (optional <force>)
  233.         (all)
  234. ;        (infos)
  235. )
  236. ;***** Caves
  237. (complete 60)
  238.  
  239. (copyfiles
  240.         (prompt "\n" #BoulderDäsh-copying-Caves)
  241.         (source (tackon SourceRoot "Caves"))
  242.         (dest (tackon BoulderDäshdestdir "Caves"))
  243.         (help @copyfiles-help)
  244.         (optional <force>)
  245.         (all)
  246. ;        (infos)
  247. )
  248. ;***** Graphics
  249. (complete 70)
  250.  
  251. (copyfiles
  252.         (prompt "\n" #BoulderDäsh-copying-Graphics)
  253.         (source (tackon SourceRoot "graphics/"))
  254.         (dest (tackon BoulderDäshdestdir "graphics/"))
  255.         (help @copyfiles-help)
  256.         (optional <force>)
  257.         (all)
  258. ;        (infos)
  259. )
  260. ;***** Fonts
  261. (complete 75)
  262.  
  263. (copyfiles
  264.         (prompt "\n" #BoulderDäsh-copying-Fonts)
  265.         (source (tackon SourceRoot "Fonts/"))
  266.         (dest (tackon BoulderDäshdestdir "Fonts/"))
  267.         (help @copyfiles-help)
  268.         (optional <force>)
  269.         (all)
  270. ;        (infos)
  271. )
  272. ;***** Catalogs
  273. (complete 80)
  274. (set lang (askoptions
  275.                 (prompt #BoulderDäsh-Language)
  276.                 (help #BoulderDäsh-Language-help)
  277.                 (choices
  278.                         "English"
  279.                         "Deutsch")
  280.                 (default -1)
  281.         )
  282. )
  283.  
  284. (set n 0)
  285. (while (< n 2)
  286.         (set language (select n "english" "deutsch"))
  287.         (
  288.                 (if (IN lang n)
  289.                 (
  290.                         (makedir (cat (tackon BoulderDäshdestdir "Catalogs/") language))
  291.                         (copyfiles
  292.                                 (source (cat (tackon SourceRoot "Catalogs/") language))
  293.                                 (dest (cat (tackon BoulderDäshdestdir "Catalogs/") language))
  294.                                 (help @copyfiles-help)
  295.                                 (all)
  296.                         )
  297.                 )
  298.                 )
  299.         )
  300. (set n (+ n 1))
  301. )
  302.  
  303. ;***** DOCS
  304. (complete 90)
  305. (set docs (askoptions
  306.                         (prompt #BoulderDäsh-Docs)
  307.                         (help @askoptions-help)
  308.                         (choices
  309.                         "Guide"
  310.                             "ASCII"
  311.  
  312.                                 )
  313.                         (default -1)
  314.                   )
  315. )
  316.  
  317. (set n 0)
  318. (while (< n 2)
  319.         (set documents (select n "BoulderDäsh.Guide" "BoulderDäsh.Dok"))
  320.         (
  321.                 (if (IN docs n)
  322.                 (
  323.                         (copyfiles
  324.                                 (source (cat (tackon SourceRoot "Docs/Deutsch/") documents))
  325.                                 (dest (tackon BoulderDäshdestdir "Docs/Deutsch/"))
  326.                                 (help @copyfiles-help)
  327. ;                               (infos)
  328.                         )
  329.                 )
  330.                 )
  331.         )
  332. (set n (+ n 1))
  333. )
  334. ;***** KEYFILE
  335. (complete 91)
  336.  
  337. ;***** Startup-Sequence
  338. (complete 95)
  339.  
  340. ;***** Prefs
  341.  
  342. ;***** Finished
  343. (complete 100)
  344.  
  345. (exit #BoulderDäsh-exit)
  346.